home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / CPOFA.z / CPOFA
Text File  |  1996-03-14  |  2KB  |  67 lines

  1.  
  2.  
  3.  
  4. CCCCPPPPOOOOFFFFAAAA((((3333FFFF))))                                                            CCCCPPPPOOOOFFFFAAAA((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      CPOFA   - CPOFA factors a complex Hermitian positive definite matrix.
  10.  
  11.      CPOFA is usually called by CPOCO, but it can be called directly with a
  12.      saving in time if  RCOND  is not needed.  (Time for CPOCO) = (1 +
  13.      18/N)*(Time for CPOFA) .
  14.  
  15.  
  16. SSSSYYYYNNNNOOOOPPPPSSSSYYYYSSSS
  17.       SUBROUTINE CPOFA(A,LDA,N,INFO)
  18.  
  19. DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
  20.      On Entry
  21.  
  22.      AAAA COMPLEX(LDA, N)
  23.         the Hermitian matrix to be factored.  Only the
  24.         diagonal and upper triangle are used.
  25.  
  26.      LLLLDDDDAAAA INTEGER
  27.         the leading dimension of the array  A .
  28.  
  29.      NNNN INTEGER
  30.         the order of the matrix  A .  On Return
  31.  
  32.      AAAA an upper triangular matrix  R  so that  A =
  33.         CTRANS(R)*R where  CTRANS(R)  is the conjugate
  34.         transpose.  The strict lower triangle is unaltered.
  35.         If  INFO .NE. 0 , the factorization is not complete.
  36.  
  37.      IIIINNNNFFFFOOOO INTEGER
  38.         = 0  for normal return.
  39.         = K  signals an error condition.  The leading minor
  40.         of order  K  is not positive definite.  LINPACK.  This version dated
  41.      08/14/78 .  Cleve Moler, University of New Mexico, Argonne National Lab.
  42.      Subroutines and Functions BLAS CDOTC Fortran AIMAG,CMPLX,CONJG,REAL,SQRT
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.